3.1448 \(\int \frac{1}{x (a-b x^7)} \, dx\)

Optimal. Leaf size=23 \[ \frac{\log (x)}{a}-\frac{\log \left (a-b x^7\right )}{7 a} \]

[Out]

Log[x]/a - Log[a - b*x^7]/(7*a)

________________________________________________________________________________________

Rubi [A]  time = 0.0135315, antiderivative size = 23, normalized size of antiderivative = 1., number of steps used = 4, number of rules used = 4, integrand size = 14, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.286, Rules used = {266, 36, 29, 31} \[ \frac{\log (x)}{a}-\frac{\log \left (a-b x^7\right )}{7 a} \]

Antiderivative was successfully verified.

[In]

Int[1/(x*(a - b*x^7)),x]

[Out]

Log[x]/a - Log[a - b*x^7]/(7*a)

Rule 266

Int[(x_)^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Dist[1/n, Subst[Int[x^(Simplify[(m + 1)/n] - 1)*(a
+ b*x)^p, x], x, x^n], x] /; FreeQ[{a, b, m, n, p}, x] && IntegerQ[Simplify[(m + 1)/n]]

Rule 36

Int[1/(((a_.) + (b_.)*(x_))*((c_.) + (d_.)*(x_))), x_Symbol] :> Dist[b/(b*c - a*d), Int[1/(a + b*x), x], x] -
Dist[d/(b*c - a*d), Int[1/(c + d*x), x], x] /; FreeQ[{a, b, c, d}, x] && NeQ[b*c - a*d, 0]

Rule 29

Int[(x_)^(-1), x_Symbol] :> Simp[Log[x], x]

Rule 31

Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]

Rubi steps

\begin{align*} \int \frac{1}{x \left (a-b x^7\right )} \, dx &=\frac{1}{7} \operatorname{Subst}\left (\int \frac{1}{x (a-b x)} \, dx,x,x^7\right )\\ &=\frac{\operatorname{Subst}\left (\int \frac{1}{x} \, dx,x,x^7\right )}{7 a}+\frac{b \operatorname{Subst}\left (\int \frac{1}{a-b x} \, dx,x,x^7\right )}{7 a}\\ &=\frac{\log (x)}{a}-\frac{\log \left (a-b x^7\right )}{7 a}\\ \end{align*}

Mathematica [A]  time = 0.0063715, size = 23, normalized size = 1. \[ \frac{\log (x)}{a}-\frac{\log \left (a-b x^7\right )}{7 a} \]

Antiderivative was successfully verified.

[In]

Integrate[1/(x*(a - b*x^7)),x]

[Out]

Log[x]/a - Log[a - b*x^7]/(7*a)

________________________________________________________________________________________

Maple [A]  time = 0.005, size = 23, normalized size = 1. \begin{align*} -{\frac{\ln \left ( b{x}^{7}-a \right ) }{7\,a}}+{\frac{\ln \left ( x \right ) }{a}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/x/(-b*x^7+a),x)

[Out]

-1/7/a*ln(b*x^7-a)+ln(x)/a

________________________________________________________________________________________

Maxima [A]  time = 0.960057, size = 34, normalized size = 1.48 \begin{align*} -\frac{\log \left (b x^{7} - a\right )}{7 \, a} + \frac{\log \left (x^{7}\right )}{7 \, a} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/x/(-b*x^7+a),x, algorithm="maxima")

[Out]

-1/7*log(b*x^7 - a)/a + 1/7*log(x^7)/a

________________________________________________________________________________________

Fricas [A]  time = 1.43264, size = 49, normalized size = 2.13 \begin{align*} -\frac{\log \left (b x^{7} - a\right ) - 7 \, \log \left (x\right )}{7 \, a} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/x/(-b*x^7+a),x, algorithm="fricas")

[Out]

-1/7*(log(b*x^7 - a) - 7*log(x))/a

________________________________________________________________________________________

Sympy [A]  time = 0.299579, size = 15, normalized size = 0.65 \begin{align*} \frac{\log{\left (x \right )}}{a} - \frac{\log{\left (- \frac{a}{b} + x^{7} \right )}}{7 a} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/x/(-b*x**7+a),x)

[Out]

log(x)/a - log(-a/b + x**7)/(7*a)

________________________________________________________________________________________

Giac [A]  time = 1.51907, size = 32, normalized size = 1.39 \begin{align*} -\frac{\log \left ({\left | b x^{7} - a \right |}\right )}{7 \, a} + \frac{\log \left ({\left | x \right |}\right )}{a} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/x/(-b*x^7+a),x, algorithm="giac")

[Out]

-1/7*log(abs(b*x^7 - a))/a + log(abs(x))/a